include(/mnt/Datos/Facultad/Latex/circuit_macros/pgf.m4)
include(/mnt/Datos/Facultad/Latex/circuit_macros/libcct.m4)
   
.PS 
cct_init
  
elen = 0.75
Origin: Here
	dot; llabel(, V_{GG},)
	resistor(down_ elen); rlabel(, R_{G}, )
	{
		line right_ elen*0.3 
		MOS:mosfet(up_ ,, LEDSQuB,S) with .G at Here; 
	{
		resistor(up_ from MOS.D to (MOS.D.x, MOD.D.y+0.1)); llabel(, R_{D},)
		line up_ elen*0.4; b_current(I_{D^*},,O,)
		dot; rlabel(, V_{DD},)
	}
	line from MOS.D to (MOS.D.x+0.5, MOS.D.y)
	{
		dot(at (MOS.D.x,MOS.D.y)); rlabel(V_D)
	}
	resistor(down_ elen*0.9); llabel(R_{L}); b_current(I_{L}, above_,O, E); ground
	resistor(down_ from MOS.S to (MOS.S.x, MOD.S.y - 1.6)); llabel(, R_{S},); b_current(I_{D})
	dot; llabel(, -V_{SS},)
.PE

